home *** CD-ROM | disk | FTP | other *** search
/ Sprite 1984 - 1993 / Sprite 1984 - 1993.iso / lib / tex / inputs / amsfonts.sty < prev    next >
Text File  |  1991-09-26  |  9KB  |  270 lines
  1. %% This is file `amsfonts.sty' generated from `amsfonts.doc'
  2. %% on 21-JUN-1991 by the docstrip.ams utility (1.0). 
  3. %% 
  4. %%@texfile{%
  5. %% filename="amsfonts.sty",
  6. %% version="1.1",
  7. %% date="21-JUN-1991",
  8. %% filetype="AMS-LaTeX: option",
  9. %% copyright="Copyright (C) American Mathematical Society, all rights
  10. %%   reserved.  Copying of this file is authorized only if either:
  11. %%   (1) you make absolutely no changes to your copy, including name;
  12. %%   OR (2) if you do make changes, you first rename it to some other
  13. %%   name.",
  14. %% author="American Mathematical Society",
  15. %% address="American Mathematical Society,
  16. %%   Technical Support Group,
  17. %%   P. O. Box 6248,
  18. %%   Providence, RI 02940,
  19. %%   USA",
  20. %% telephone="401-455-4080 or (in the USA) 800-321-4AMS",
  21. %% email="Internet: Tech-Support@Math.AMS.com",
  22. %% checksumtype="line count",
  23. %% checksum="269",
  24. %% codetable="ISO/ASCII",
  25. %% keywords="latex, amslatex, ams-latex, amsfonts, msam, msbm, eufm,
  26. %%   blackboard bold",
  27. %% abstract="This file is part of the AMS-\LaTeX{} package, ver. 1.1.
  28. %%   It is a \LaTeX{} option that provides a `newsymbol' command for
  29. %%   defining math symbols from the two math symbol fonts in the
  30. %%   AMSFonts (version 2.0+) font package. See the AMSFonts user's guide
  31. %%   for more information. It also defines a command for producing
  32. %%   `blackboard bold' letters (uppercase only)."
  33. %%}
  34. \expandafter\ifx\csname amsfonts.sty\endcsname\relax
  35. \expandafter\def\csname amsfonts.sty\endcsname{}
  36. \else\message{---already loaded}\endinput\fi
  37. \def\filename{amsfonts.sty}
  38. \def\fileversion{1.1} \def\filedate{21-JUN-1991}
  39. \immediate\write16{%
  40. AMS-LaTeX option `\filename' (\fileversion, \filedate)}
  41. %%% end of file header
  42. \def\RIfM@{\relax\protect\ifmmode}
  43. \def\boxz@{\box\z@}
  44. \def\setboxz@h{\setbox\z@\hbox}
  45. \def\wdz@{\wd\z@}
  46. \def\noaccents@{\def\accentclass@{0}}
  47. \def\Invalid@@{Invalid use of \string}
  48. \def\nonmatherr@#1{\err@
  49.     {\string#1\space allowed only in math mode}\@ehd}
  50. \@ifundefined{err@}{\def\err@{\@latexerr}}{}
  51. \new@mathgroup\msa@group
  52. \new@mathgroup\msb@group
  53. \define@mathgroup\mv@normal\msa@group{msa}{m}{n}
  54. \define@mathgroup\mv@normal\msb@group{msb}{m}{n}
  55. \define@mathgroup\mv@bold\msa@group{msa}{m}{n}
  56. \define@mathgroup\mv@bold\msb@group{msb}{m}{n}
  57. {\catcode`\"=12
  58. \edef\@tempa{\hexnumber@\msa@group}%
  59. \edef\@tempb{\hexnumber@\msb@group}%
  60. \xdef\ulcorner{\delimiter"4\@tempa 70\@tempa 70 }
  61. \xdef\urcorner{\delimiter"5\@tempa 71\@tempa 71 }
  62. \xdef\llcorner{\delimiter"4\@tempa 78\@tempa 78 }
  63. \xdef\lrcorner{\delimiter"5\@tempa 79\@tempa 79 }
  64. \xdef\yen      {\noexpand\mathhexbox\@tempa 55 }
  65. \xdef\checkmark{\noexpand\mathhexbox\@tempa 58 }
  66. \xdef\circledR {\noexpand\mathhexbox\@tempa 72 }
  67. \xdef\maltese  {\noexpand\mathhexbox\@tempa 7A }
  68. \xdef\widehat#1{\noexpand\setboxz@h{$\noexpand\m@th#1$}%
  69.  \noexpand\ifdim\noexpand\wdz@>\tw@ em\mathaccent"0\@tempb5B{#1}%
  70.  \noexpand\else\mathaccent"0362{#1}\noexpand\fi}
  71. \xdef\widetilde#1{\noexpand\setboxz@h{$\noexpand\m@th#1$}%
  72.  \noexpand\ifdim\noexpand\wdz@>\tw@ em\mathaccent"0\@tempb5D{#1}%
  73.  \noexpand\else\mathaccent"0365{#1}\noexpand\fi}
  74. \mathchardef\dabar@="0\@tempa39
  75. \xdef\dashrightarrow{\mathrel{\dabar@\dabar@\mathchar"0\@tempa4B}}%
  76. \xdef\dashleftarrow{\mathrel{\mathchar"0\@tempa4C\dabar@\dabar@}}%
  77. \global\let\dasharrow\dashrightarrow
  78. \gdef\newsymbol#1#2#3#4#5{%
  79.     \@ifdefinable#1{%
  80.        \edef\next@
  81.          {\ifcase #2 \or
  82.             \hexnumber@{\msa@group}\or
  83.             \hexnumber@{\msb@group}\fi}%
  84.        \ifx\next@\@empty
  85.          \err@{\Invalid@@\newsymbol}\@ehd%
  86.        \else
  87.         \global\mathchardef#1"#3\next@#4#5
  88.        \fi}}
  89. }
  90. \let\rightleftharpoons\undefined \newsymbol\rightleftharpoons 130A
  91. \let\angle\undefined             \newsymbol\angle             105C
  92. \let\hbar\undefined              \newsymbol\hbar              207E
  93. \let\sqsubset\undefined          \newsymbol\sqsubset          1340
  94. \let\sqsupset\undefined          \newsymbol\sqsupset          1341
  95. \let\mho\undefined               \newsymbol\mho               2066
  96. \let\Box\undefined      \newsymbol\Box 1203
  97. \let\Diamond\undefined  \newsymbol\Diamond 1206
  98. \let\leadsto\undefined  \newsymbol\leadsto 1320
  99. \let\lhd\undefined      \newsymbol\lhd 1343
  100. \let\unlhd\undefined    \newsymbol\unlhd 1345
  101. \let\rhd\undefined      \newsymbol\rhd 1342
  102. \let\unrhd\undefined    \newsymbol\unrhd 1344
  103. \edef\Join{\mathrel{\mathchar"0\hexnumber@\msb@group 6F\mkern-13.8mu%
  104.   \mathchar"0\hexnumber@\msb@group 6E}}
  105. \def\frak{\protect\pfrak}
  106. \def\pfrak{\RIfM@\expandafter\frak@\else
  107.                  \expandafter\nonmatherr@\expandafter\frak\fi}
  108. \newmathalphabet\frak@
  109. \addtoversion{normal}\frak@{euf}{m}{n}
  110. \addtoversion{bold}\frak@{euf}{b}{n}
  111. \def\bold{\protect\pbold}
  112. \def\pbold{\RIfM@\expandafter\bold@\else
  113.                  \expandafter\nonmatherr@\expandafter\bold\fi}
  114. \newmathalphabet*\bold@{cmr}{bx}{n}
  115. \def\Bbb{\protect\pBbb}
  116. \def\pBbb{\RIfM@\expandafter\Bbb@\else
  117.                  \expandafter\nonmatherr@\expandafter\Bbb\fi}
  118. \edef\Bbb@{\noexpand\use@mathgroup
  119.           \expandafter\noexpand\csname =msb\endcsname
  120.           \msb@group}
  121. \def\goth{\family{euf}\selectfont\frak@}
  122. \newbox\Mathstrutbox@
  123. \setbox\Mathstrutbox@\null
  124. \def\Mathstrut@{\copy\Mathstrutbox@}
  125. \addto@hook\every@size{\setbox\z@\hbox{$\m@th($}%
  126.         \ht\Mathstrutbox@\ht\z@
  127.         \dp\Mathstrutbox@\dp\z@}
  128. \newbox\strutbox@
  129. \def\strut@{\copy\strutbox@}
  130. \addto@hook\every@size{%
  131.     \setbox\strutbox@\hbox{\lower.5\normallineskiplimit
  132.          \vbox{\kern-\normallineskiplimit\copy\strutbox}}}
  133. \def\big{\bBigg@\@ne}
  134. \def\Big{\bBigg@{1.5}}
  135. \def\bigg{\bBigg@\tw@}
  136. \def\Bigg{\bBigg@{2.5}}
  137. \def\bBigg@#1#2{%
  138.    {%
  139.     \hbox{$\left#2\vcenter to#1\big@size{}\right.%
  140.                          \nulldelimiterspace\z@ \m@th$}}}
  141. \addto@hook\every@size{\setbox\z@\vbox{\hbox{$($}\kern\z@}%
  142.   \big@size 1.2\ht\z@}
  143. \newdimen\big@size
  144. \newdimen\ex@
  145. \addto@hook\every@size{\ex@.2326\fontdimen5\textfont\@ne}
  146. \newdimen\minaw@
  147. \addto@hook\every@size{\minaw@11.11128\ex@}
  148. \addto@hook\every@size{\jot\thr@@\ex@}
  149. \newmuskip\dotsspace@
  150. \dotsspace@1.5mu
  151. \def\smash{\@ifnextchar[\@xsmash{\@xsmash[tb]}}
  152. \def\@xsmash[#1]{\def\smash@{#1}%
  153.   \ifmmode\expandafter\mathpalette\expandafter\mathsm@sh\else
  154.         \expandafter\makesm@sh\fi}
  155. \def\finsm@sh{\def\mb@t{\ht\z@\z@}\def\mb@b{\dp\z@\z@}%
  156.    \expandafter\@tfor\expandafter\@tempa
  157.          \expandafter:\expandafter=\smash@\do
  158.       {\csname mb@\@tempa\endcsname}%
  159.    \leavevmode\boxz@}
  160. \def\default@mextra{\def\accentclass@{7}}
  161. \extra@def{cmm}{\skewchar#1'177}{\noaccents@}
  162. \extra@def{cmsy}{\skewchar#1'60}{\noaccents@}
  163. \new@fontshape{msa}{m}{n}{%
  164.    <5>msam5%
  165.    <6>msam6%
  166.    <7>msam7%
  167.    <8>msam8%
  168.    <9>msam9%
  169.    <10>msam10%
  170.    <11>msam10 at10.95pt%
  171.    <12>msam10 at12pt%
  172.    <14>msam10 at14.4pt%
  173.    <17>msam10 at17.28pt%
  174.    <20>msam10 at20.74pt%
  175.    <25>msam10 at24.88pt}{}
  176. \extra@def{msa}{}{}
  177. \new@fontshape{msb}{m}{n}{%
  178.    <5>msbm5%
  179.    <6>msbm6%
  180.    <7>msbm7%
  181.    <8>msbm8%
  182.    <9>msbm9%
  183.    <10>msbm10%
  184.    <11>msbm10 at10.95pt%
  185.    <12>msbm10 at12pt%
  186.    <14>msbm10 at14.4pt%
  187.    <17>msbm10 at17.28pt%
  188.    <20>msbm10 at20.74pt%
  189.    <25>msbm10 at24.88pt}{}
  190. \extra@def{msb}{}{\noaccents@}
  191. \new@fontshape{euf}{m}{n}{%
  192.    <5>eufm5%
  193.    <6>eufm6%
  194.    <7>eufm7%
  195.    <8>eufm8%
  196.    <9>eufm9%
  197.    <10>eufm10%
  198.    <11>eufm10 at10.95pt%
  199.    <12>eufm10 at12pt%
  200.    <14>eufm10 at14.4pt%
  201.    <17>eufm10 at17.28pt%
  202.    <20>eufm10 at20.74pt%
  203.    <25>eufm10 at24.88pt}{}
  204. \new@fontshape{euf}{b}{n}{%
  205.    <5>eufb5%
  206.    <6>eufb6%
  207.    <7>eufb7%
  208.    <8>eufb8%
  209.    <9>eufb9%
  210.    <10>eufb10%
  211.    <11>eufb10 at10.95pt%
  212.    <12>eufb10 at12pt%
  213.    <14>eufb14%
  214.    <17>eufb14 at17.28pt%
  215.    <20>eufb14 at20.74pt%
  216.    <25>eufb14 at24.88pt}{}
  217. \extra@def{euf}{\hyphenchar#1\m@ne
  218.        \@tempdima\fontdimen2#1%
  219.        \fontdimen3#1.4\@tempdima
  220.        \fontdimen4#1.3\@tempdima}
  221.       {\noaccents@}
  222. \new@fontshape{cmm}{b}{it}{%
  223.       <5>cmmib5%
  224.       <6>cmmib6%
  225.       <7>cmmib7%
  226.       <8>cmmib8%
  227.       <9>cmmib9%
  228.       <10>cmmib10%
  229.       <11>cmmib10 at10.95pt%
  230.       <12>cmmib10 at12pt%
  231.       <14>cmmib10 at14.4pt%
  232.       <17>cmmib10 at17.28pt%
  233.       <20>cmmib10 at20.74pt%
  234.       <25>cmmib10 at24.88pt%
  235.       }{}
  236. \new@fontshape{cmsy}{b}{n}{%
  237.       <5>cmbsy5%
  238.       <6>cmbsy6%
  239.       <7>cmbsy7%
  240.       <8>cmbsy8%
  241.       <9>cmbsy9%
  242.       <10>cmbsy10%
  243.       <11>cmbsy10 at10.95pt%
  244.       <12>cmbsy10 at12pt%
  245.       <14>cmbsy10 at14.4pt%
  246.       <17>cmbsy10 at17.28pt%
  247.       <20>cmbsy10 at20.74pt%
  248.       <25>cmbsy10 at24.88pt%
  249.       }{}
  250. \def\unbracefonts@{\let\math@bgroup\@empty\let\math@egroup\@empty}
  251. \def\operator@font{\mathgroup\z@}
  252. %% \CharacterTable
  253. %%  {Upper-case    \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
  254. %%   Lower-case    \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
  255. %%   Digits        \0\1\2\3\4\5\6\7\8\9
  256. %%   Exclamation   \!     Double quote  \"     Hash (number) \#
  257. %%   Dollar        \$     Percent       \%     Ampersand     \&
  258. %%   Acute accent  \'     Left paren    \(     Right paren   \)
  259. %%   Asterisk      \*     Plus          \+     Comma         \,
  260. %%   Minus         \-     Point         \.     Solidus       \/
  261. %%   Colon         \:     Semicolon     \;     Less than     \<
  262. %%   Equals        \=     Greater than  \>     Question mark \?
  263. %%   Commercial at \@     Left bracket  \[     Backslash     \\
  264. %%   Right bracket \]     Circumflex    \^     Underscore    \_
  265. %%   Grave accent  \`     Left brace    \{     Vertical bar  \|
  266. %%   Right brace   \}     Tilde         \~}
  267. \endinput
  268. %% 
  269. %% End of file `amsfonts.sty'.
  270.